extern int qrbd_(integer *ipass, doublereal *q, doublereal *e, integer *nn, doublereal *v, integer *mdv, integer *nrv, doublereal *c__, integer *mdc, integer *ncc);
/*:ref: diff_ 7 2 7 7 */
/*:ref: g1_ 14 5 7 7 7 7 7 */
